home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / emacs-complete / fsf / emacs / lisp / saveplace.elc < prev    next >
Emacs Compiled Lisp  |  1994-09-05  |  4.0 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: Emacs Compiled Lisp (other/emacsCompiledLisp).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Emacs Compiled Lisp (other/emacsCompiledLisp) magic Unsupported
100% file Emacs/XEmacs v19 byte-compiled Lisp data default
99% file data default
55% TrID Emacs/XEmacs byte-compiled Lisp (generic) default
44% TrID Summation Document Image Information Load File default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 72 6d 73 40 6d 6f 6c |piled by| rms@mol|
|00000020| 65 2e 67 6e 75 2e 61 69 | 2e 6d 69 74 2e 65 64 75 |e.gnu.ai|.mit.edu|
|00000030| 20 6f 6e 20 4d 6f 6e 20 | 53 65 70 20 20 35 20 32 | on Mon |Sep 5 2|
|00000040| 32 3a 31 36 3a 34 33 20 | 31 39 39 34 0a 3b 3b 3b |2:16:43 |1994.;;;|
|00000050| 20 66 72 6f 6d 20 66 69 | 6c 65 20 2f 68 6f 6d 65 | from fi|le /home|
|00000060| 2f 66 73 66 2f 72 6d 73 | 2f 65 31 39 2f 6c 69 73 |/fsf/rms|/e19/lis|
|00000070| 70 2f 73 61 76 65 70 6c | 61 63 65 2e 65 6c 0a 3b |p/savepl|ace.el.;|
|00000080| 3b 3b 20 65 6d 61 63 73 | 20 76 65 72 73 69 6f 6e |;; emacs| version|
|00000090| 20 31 39 2e 32 36 2e 31 | 2e 0a 3b 3b 3b 20 62 79 | 19.26.1|..;;; by|
|000000a0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 46 |tecomp v|ersion F|
|000000b0| 53 46 20 32 2e 31 30 0a | 3b 3b 3b 20 6f 70 74 69 |SF 2.10.|;;; opti|
|000000c0| 6d 69 7a 61 74 69 6f 6e | 20 69 73 20 6f 6e 2e 0a |mization| is on..|
|000000d0| 3b 3b 3b 20 74 68 69 73 | 20 66 69 6c 65 20 75 73 |;;; this| file us|
|000000e0| 65 73 20 6f 70 63 6f 64 | 65 73 20 77 68 69 63 68 |es opcod|es which|
|000000f0| 20 64 6f 20 6e 6f 74 20 | 65 78 69 73 74 20 69 6e | do not |exist in|
|00000100| 20 45 6d 61 63 73 20 31 | 38 2e 0a 0a 28 69 66 20 | Emacs 1|8...(if |
|00000110| 28 61 6e 64 20 28 62 6f | 75 6e 64 70 20 27 65 6d |(and (bo|undp 'em|
|00000120| 61 63 73 2d 76 65 72 73 | 69 6f 6e 29 0a 09 20 28 |acs-vers|ion).. (|
|00000130| 6f 72 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |or (and |(boundp |
|00000140| 27 65 70 6f 63 68 3a 3a | 76 65 72 73 69 6f 6e 29 |'epoch::|version)|
|00000150| 20 65 70 6f 63 68 3a 3a | 76 65 72 73 69 6f 6e 29 | epoch::|version)|
|00000160| 0a 09 20 20 20 20 20 28 | 73 74 72 69 6e 67 2d 6c |.. (|string-l|
|00000170| 65 73 73 70 20 65 6d 61 | 63 73 2d 76 65 72 73 69 |essp ema|cs-versi|
|00000180| 6f 6e 20 22 31 39 22 29 | 29 29 0a 20 20 20 20 28 |on "19")|)). (|
|00000190| 65 72 72 6f 72 20 22 60 | 2f 68 6f 6d 65 2f 66 73 |error "`|/home/fs|
|000001a0| 66 2f 72 6d 73 2f 65 31 | 39 2f 6c 69 73 70 2f 73 |f/rms/e1|9/lisp/s|
|000001b0| 61 76 65 70 6c 61 63 65 | 2e 65 6c 27 20 77 61 73 |aveplace|.el' was|
|000001c0| 20 63 6f 6d 70 69 6c 65 | 64 20 66 6f 72 20 45 6d | compile|d for Em|
|000001d0| 61 63 73 20 31 39 22 29 | 29 0a 0a 28 64 65 66 76 |acs 19")|)..(defv|
|000001e0| 61 72 20 73 61 76 65 2d | 70 6c 61 63 65 2d 61 6c |ar save-|place-al|
|000001f0| 69 73 74 20 6e 69 6c 20 | 22 5c 0a 41 6c 69 73 74 |ist nil |"\.Alist|
|00000200| 20 6f 66 20 73 61 76 65 | 64 20 70 6c 61 63 65 73 | of save|d places|
|00000210| 20 74 6f 20 67 6f 20 62 | 61 63 6b 20 74 6f 20 77 | to go b|ack to w|
|00000220| 68 65 6e 20 72 65 76 69 | 73 69 74 69 6e 67 20 66 |hen revi|siting f|
|00000230| 69 6c 65 73 2e 0a 45 61 | 63 68 20 65 6c 65 6d 65 |iles..Ea|ch eleme|
|00000240| 6e 74 20 6c 6f 6f 6b 73 | 20 6c 69 6b 65 20 28 46 |nt looks| like (F|
|00000250| 49 4c 45 4e 41 4d 45 20 | 2e 20 50 4f 53 49 54 49 |ILENAME |. POSITI|
|00000260| 4f 4e 29 3b 0a 76 69 73 | 69 74 69 6e 67 20 66 69 |ON);.vis|iting fi|
|00000270| 6c 65 20 46 49 4c 45 4e | 41 4d 45 20 67 6f 65 73 |le FILEN|AME goes|
|00000280| 20 61 75 74 6f 6d 61 74 | 69 63 61 6c 6c 79 20 74 | automat|ically t|
|00000290| 6f 20 70 6f 73 69 74 69 | 6f 6e 20 50 4f 53 49 54 |o positi|on POSIT|
|000002a0| 49 4f 4e 0a 72 61 74 68 | 65 72 20 74 68 61 6e 20 |ION.rath|er than |
|000002b0| 74 68 65 20 62 65 67 69 | 6e 6e 69 6e 67 20 6f 66 |the begi|nning of|
|000002c0| 20 74 68 65 20 62 75 66 | 66 65 72 2e 0a 54 68 69 | the buf|fer..Thi|
|000002d0| 73 20 61 6c 69 73 74 20 | 69 73 20 73 61 76 65 64 |s alist |is saved|
|000002e0| 20 62 65 74 77 65 65 6e | 20 45 6d 61 63 73 20 73 | between| Emacs s|
|000002f0| 65 73 73 69 6f 6e 73 2e | 22 29 0a 28 64 65 66 76 |essions.|").(defv|
|00000300| 61 72 20 73 61 76 65 2d | 70 6c 61 63 65 20 6e 69 |ar save-|place ni|
|00000310| 6c 20 22 5c 0a 2a 4e 6f | 6e 2d 6e 69 6c 20 6d 65 |l "\.*No|n-nil me|
|00000320| 61 6e 73 20 61 75 74 6f | 6d 61 74 69 63 61 6c 6c |ans auto|maticall|
|00000330| 79 20 73 61 76 65 20 70 | 6c 61 63 65 20 69 6e 20 |y save p|lace in |
|00000340| 65 61 63 68 20 66 69 6c | 65 2e 0a 54 68 69 73 20 |each fil|e..This |
|00000350| 6d 65 61 6e 73 20 77 68 | 65 6e 20 79 6f 75 20 76 |means wh|en you v|
|00000360| 69 73 69 74 20 61 20 66 | 69 6c 65 2c 20 70 6f 69 |isit a f|ile, poi|
|00000370| 6e 74 20 67 6f 65 73 20 | 74 6f 20 74 68 65 20 6c |nt goes |to the l|
|00000380| 61 73 74 20 70 6c 61 63 | 65 0a 77 68 65 72 65 20 |ast plac|e.where |
|00000390| 69 74 20 77 61 73 20 77 | 68 65 6e 20 79 6f 75 20 |it was w|hen you |
|000003a0| 70 72 65 76 69 6f 75 73 | 6c 79 20 76 69 73 69 74 |previous|ly visit|
|000003b0| 65 64 20 74 68 65 20 73 | 61 6d 65 20 66 69 6c 65 |ed the s|ame file|
|000003c0| 2e 0a 54 68 69 73 20 76 | 61 72 69 61 62 6c 65 20 |..This v|ariable |
|000003d0| 69 73 20 61 75 74 6f 6d | 61 74 69 63 61 6c 6c 79 |is autom|atically|
|000003e0| 20 62 75 66 66 65 72 2d | 6c 6f 63 61 6c 2e 0a 0a | buffer-|local...|
|000003f0| 49 66 20 79 6f 75 20 77 | 69 73 68 20 79 6f 75 72 |If you w|ish your|
|00000400| 20 70 6c 61 63 65 20 69 | 6e 20 61 6e 79 20 66 69 | place i|n any fi|
|00000410| 6c 65 20 74 6f 20 61 6c | 77 61 79 73 20 62 65 20 |le to al|ways be |
|00000420| 61 75 74 6f 6d 61 74 69 | 63 61 6c 6c 79 20 73 61 |automati|cally sa|
|00000430| 76 65 64 2c 0a 73 69 6d | 70 6c 79 20 70 75 74 20 |ved,.sim|ply put |
|00000440| 74 68 69 73 20 69 6e 20 | 79 6f 75 72 20 60 7e 2f |this in |your `~/|
|00000450| 2e 65 6d 61 63 73 27 20 | 66 69 6c 65 3a 0a 0a 28 |.emacs' |file:..(|
|00000460| 73 65 74 71 2d 64 65 66 | 61 75 6c 74 20 73 61 76 |setq-def|ault sav|
|00000470| 65 2d 70 6c 61 63 65 20 | 74 29 22 29 0a 28 6d 61 |e-place |t)").(ma|
|00000480| 6b 65 2d 76 61 72 69 61 | 62 6c 65 2d 62 75 66 66 |ke-varia|ble-buff|
|00000490| 65 72 2d 6c 6f 63 61 6c | 20 28 71 75 6f 74 65 20 |er-local| (quote |
|000004a0| 73 61 76 65 2d 70 6c 61 | 63 65 29 29 0a 28 64 65 |save-pla|ce)).(de|
|000004b0| 66 76 61 72 20 73 61 76 | 65 2d 70 6c 61 63 65 2d |fvar sav|e-place-|
|000004c0| 66 69 6c 65 20 22 7e 2f | 2e 65 6d 61 63 73 2d 70 |file "~/|.emacs-p|
|000004d0| 6c 61 63 65 73 22 20 22 | 5c 0a 2a 4e 61 6d 65 20 |laces" "|\.*Name |
|000004e0| 6f 66 20 74 68 65 20 66 | 69 6c 65 20 74 68 61 74 |of the f|ile that|
|000004f0| 20 72 65 63 6f 72 64 73 | 20 60 73 61 76 65 2d 70 | records| `save-p|
|00000500| 6c 61 63 65 2d 61 6c 69 | 73 74 27 20 76 61 6c 75 |lace-ali|st' valu|
|00000510| 65 2e 22 29 0a 28 64 65 | 66 76 61 72 20 73 61 76 |e.").(de|fvar sav|
|00000520| 65 2d 70 6c 61 63 65 2d | 76 65 72 73 69 6f 6e 2d |e-place-|version-|
|00000530| 63 6f 6e 74 72 6f 6c 20 | 28 71 75 6f 74 65 20 6e |control |(quote n|
|00000540| 6f 73 70 65 63 69 61 6c | 29 20 22 5c 0a 2a 43 6f |ospecial|) "\.*Co|
|00000550| 6e 74 72 6f 6c 73 20 77 | 68 65 74 68 65 72 20 74 |ntrols w|hether t|
|00000560| 6f 20 6d 61 6b 65 20 6e | 75 6d 62 65 72 65 64 20 |o make n|umbered |
|00000570| 62 61 63 6b 75 70 73 20 | 6f 66 20 6d 61 73 74 65 |backups |of maste|
|00000580| 72 20 73 61 76 65 2d 70 | 6c 61 63 65 20 66 69 6c |r save-p|lace fil|
|00000590| 65 2e 0a 49 74 20 63 61 | 6e 20 68 61 76 65 20 66 |e..It ca|n have f|
|000005a0| 6f 75 72 20 76 61 6c 75 | 65 73 3a 20 74 2c 20 6e |our valu|es: t, n|
|000005b0| 69 6c 2c 20 60 6e 65 76 | 65 72 27 2c 20 61 6e 64 |il, `nev|er', and|
|000005c0| 20 60 6e 6f 73 70 65 63 | 69 61 6c 27 2e 20 20 54 | `nospec|ial'. T|
|000005d0| 68 65 20 66 69 72 73 74 | 0a 74 68 72 65 65 20 68 |he first|.three h|
|000005e0| 61 76 65 20 74 68 65 20 | 73 61 6d 65 20 6d 65 61 |ave the |same mea|
|000005f0| 6e 69 6e 67 20 74 68 61 | 74 20 74 68 65 79 20 64 |ning tha|t they d|
|00000600| 6f 20 66 6f 72 20 74 68 | 65 20 76 61 72 69 61 62 |o for th|e variab|
|00000610| 6c 65 0a 60 76 65 72 73 | 69 6f 6e 2d 63 6f 6e 74 |le.`vers|ion-cont|
|00000620| 72 6f 6c 27 2c 20 61 6e | 64 20 74 68 65 20 66 69 |rol', an|d the fi|
|00000630| 6e 61 6c 20 76 61 6c 75 | 65 20 60 6e 6f 73 70 65 |nal valu|e `nospe|
|00000640| 63 69 61 6c 27 20 6d 65 | 61 6e 73 20 6a 75 73 74 |cial' me|ans just|
|00000650| 20 75 73 65 20 74 68 65 | 0a 76 61 6c 75 65 20 6f | use the|.value o|
|00000660| 66 20 60 76 65 72 73 69 | 6f 6e 2d 63 6f 6e 74 72 |f `versi|on-contr|
|00000670| 6f 6c 27 2e 22 29 0a 28 | 64 65 66 76 61 72 20 73 |ol'.").(|defvar s|
|00000680| 61 76 65 2d 70 6c 61 63 | 65 2d 6c 6f 61 64 65 64 |ave-plac|e-loaded|
|00000690| 20 6e 69 6c 20 22 5c 0a | 4e 6f 6e 2d 6e 69 6c 20 | nil "\.|Non-nil |
|000006a0| 6d 65 61 6e 73 20 74 68 | 61 74 20 74 68 65 20 60 |means th|at the `|
|000006b0| 73 61 76 65 2d 70 6c 61 | 63 65 2d 66 69 6c 65 27 |save-pla|ce-file'|
|000006c0| 20 68 61 73 20 62 65 65 | 6e 20 6c 6f 61 64 65 64 | has bee|n loaded|
|000006d0| 2e 22 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 74 |.").(def|alias 't|
|000006e0| 6f 67 67 6c 65 2d 73 61 | 76 65 2d 70 6c 61 63 65 |oggle-sa|ve-place|
|000006f0| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 70 61 | #[(&opt|ional pa|
|00000700| 72 67 29 20 22 08 84 5c | 66 00 c1 c2 c3 c4 20 5c |rg) "..\|f..... \|
|00000710| 22 21 87 0d 83 24 00 0e | 06 83 1c 00 0e 06 c7 58 |"!...$..|.......X|
|00000720| 83 24 00 c1 c8 21 88 c9 | 89 15 87 c1 ca 21 88 cb |.$...!..|.....!..|
|00000730| 89 15 87 22 20 5b 62 75 | 66 66 65 72 2d 66 69 6c |..." [bu|ffer-fil|
|00000740| 65 2d 6e 61 6d 65 20 6d | 65 73 73 61 67 65 20 66 |e-name m|essage f|
|00000750| 6f 72 6d 61 74 20 22 42 | 75 66 66 65 72 20 5c 22 |ormat "B|uffer \"|
|00000760| 25 73 5c 22 20 6e 6f 74 | 20 76 69 73 69 74 69 6e |%s\" not| visitin|
|00000770| 67 20 61 20 66 69 6c 65 | 2e 22 20 62 75 66 66 65 |g a file|." buffe|
|00000780| 72 2d 6e 61 6d 65 20 73 | 61 76 65 2d 70 6c 61 63 |r-name s|ave-plac|
|00000790| 65 20 70 61 72 67 20 30 | 20 22 4e 6f 20 70 6c 61 |e parg 0| "No pla|
|000007a0| 63 65 20 77 69 6c 6c 20 | 62 65 20 73 61 76 65 64 |ce will |be saved|
|000007b0| 20 69 6e 20 74 68 69 73 | 20 66 69 6c 65 2e 22 20 | in this| file." |
|000007c0| 6e 69 6c 20 22 50 6c 61 | 63 65 20 77 69 6c 6c 20 |nil "Pla|ce will |
|000007d0| 62 65 20 73 61 76 65 64 | 2e 22 20 74 5d 20 34 20 |be saved|." t] 4 |
|000007e0| 22 5c 0a 54 6f 67 67 6c | 65 20 77 68 65 74 68 65 |"\.Toggl|e whethe|
|000007f0| 72 20 74 6f 20 73 61 76 | 65 20 79 6f 75 72 20 70 |r to sav|e your p|
|00000800| 6c 61 63 65 20 69 6e 20 | 74 68 69 73 20 66 69 6c |lace in |this fil|
|00000810| 65 20 62 65 74 77 65 65 | 6e 20 73 65 73 73 69 6f |e betwee|n sessio|
|00000820| 6e 73 2e 0a 49 66 20 74 | 68 69 73 20 6d 6f 64 65 |ns..If t|his mode|
|00000830| 20 69 73 20 65 6e 61 62 | 6c 65 64 2c 20 70 6f 69 | is enab|led, poi|
|00000840| 6e 74 20 69 73 20 72 65 | 63 6f 72 64 65 64 20 77 |nt is re|corded w|
|00000850| 68 65 6e 20 79 6f 75 20 | 6b 69 6c 6c 20 74 68 65 |hen you |kill the|
|00000860| 20 62 75 66 66 65 72 0a | 6f 72 20 65 78 69 74 20 | buffer.|or exit |
|00000870| 45 6d 61 63 73 2e 20 20 | 56 69 73 69 74 69 6e 67 |Emacs. |Visiting|
|00000880| 20 74 68 69 73 20 66 69 | 6c 65 20 61 67 61 69 6e | this fi|le again|
|00000890| 20 77 69 6c 6c 20 67 6f | 20 74 6f 20 74 68 61 74 | will go| to that|
|000008a0| 20 70 6f 73 69 74 69 6f | 6e 2c 0a 65 76 65 6e 20 | positio|n,.even |
|000008b0| 69 6e 20 61 20 6c 61 74 | 65 72 20 45 6d 61 63 73 |in a lat|er Emacs|
|000008c0| 20 73 65 73 73 69 6f 6e | 2e 0a 0a 49 66 20 63 61 | session|...If ca|
|000008d0| 6c 6c 65 64 20 77 69 74 | 68 20 61 20 70 72 65 66 |lled wit|h a pref|
|000008e0| 69 78 20 61 72 67 2c 20 | 74 68 65 20 6d 6f 64 65 |ix arg, |the mode|
|000008f0| 20 69 73 20 65 6e 61 62 | 6c 65 64 20 69 66 20 61 | is enab|led if a|
|00000900| 6e 64 20 6f 6e 6c 79 20 | 69 66 0a 74 68 65 20 61 |nd only |if.the a|
|00000910| 72 67 75 6d 65 6e 74 20 | 69 73 20 70 6f 73 69 74 |rgument |is posit|
|00000920| 69 76 65 2e 0a 0a 54 6f | 20 73 61 76 65 20 70 6c |ive...To| save pl|
|00000930| 61 63 65 73 20 61 75 74 | 6f 6d 61 74 69 63 61 6c |aces aut|omatical|
|00000940| 6c 79 20 69 6e 20 61 6c | 6c 20 66 69 6c 65 73 2c |ly in al|l files,|
|00000950| 20 70 75 74 20 74 68 69 | 73 20 69 6e 20 79 6f 75 | put thi|s in you|
|00000960| 72 20 60 2e 65 6d 61 63 | 73 27 20 66 69 6c 65 3a |r `.emac|s' file:|
|00000970| 0a 0a 28 73 65 74 71 2d | 64 65 66 61 75 6c 74 20 |..(setq-|default |
|00000980| 73 61 76 65 2d 70 6c 61 | 63 65 20 74 29 22 20 22 |save-pla|ce t)" "|
|00000990| 50 22 5d 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |P"]).(by|te-code |
|000009a0| 22 c0 c1 c2 5c 22 88 c0 | c3 c4 5c 22 88 c0 c5 c6 |"...\"..|..\"....|
|000009b0| 5c 22 88 c0 c7 c8 5c 22 | 88 c0 c9 ca 5c 22 88 c0 |\"....\"|....\"..|
|000009c0| cb cc 5c 22 88 cd ce c9 | cf 23 88 cd d0 cb 5c 22 |..\"....|.#....\"|
|000009d0| 88 cd d1 c1 5c 22 88 d2 | d3 21 87 22 20 5b 64 65 |....\"..|.!." [de|
|000009e0| 66 61 6c 69 61 73 20 73 | 61 76 65 2d 70 6c 61 63 |falias s|ave-plac|
|000009f0| 65 2d 74 6f 2d 61 6c 69 | 73 74 20 23 5b 6e 69 6c |e-to-ali|st #[nil|
|00000a00| 20 22 08 84 07 00 c1 20 | 88 5c 6e 85 26 00 c3 5c | "..... |.\n.&..\|
|00000a10| 6e 5c 66 5c 22 89 1d 83 | 19 00 c6 0d 5c 66 5c 22 |n\f\"...|....\f\"|
|00000a20| 14 29 0e 07 85 26 00 5c | 6e 60 42 5c 66 42 89 14 |.)...&.\|n`B\fB..|
|00000a30| 87 22 20 5b 73 61 76 65 | 2d 70 6c 61 63 65 2d 6c |." [save|-place-l|
|00000a40| 6f 61 64 65 64 20 6c 6f | 61 64 2d 73 61 76 65 2d |oaded lo|ad-save-|
|00000a50| 70 6c 61 63 65 2d 61 6c | 69 73 74 2d 66 72 6f 6d |place-al|ist-from|
|00000a60| 2d 66 69 6c 65 20 62 75 | 66 66 65 72 2d 66 69 6c |-file bu|ffer-fil|
|00000a70| 65 2d 6e 61 6d 65 20 61 | 73 73 6f 63 20 73 61 76 |e-name a|ssoc sav|
|00000a80| 65 2d 70 6c 61 63 65 2d | 61 6c 69 73 74 20 63 65 |e-place-|alist ce|
|00000a90| 6c 6c 20 64 65 6c 71 20 | 73 61 76 65 2d 70 6c 61 |ll delq |save-pla|
|00000aa0| 63 65 5d 20 34 5d 20 73 | 61 76 65 2d 70 6c 61 63 |ce] 4] s|ave-plac|
|00000ab0| 65 2d 61 6c 69 73 74 2d | 74 6f 2d 66 69 6c 65 20 |e-alist-|to-file |
|00000ac0| 23 5b 6e 69 6c 20 22 c0 | 09 21 1a 8a c3 c4 c5 5c |#[nil ".|.!.....\|
|00000ad0| 6e 5c 22 21 88 c6 c7 21 | 71 88 65 64 7c 88 c8 5c |n\"!...!|q.ed|..\|
|00000ae0| 6e 21 83 1f 00 c9 5c 6e | 21 88 65 64 7c 88 65 62 |n!....\n|!.ed|.eb|
|00000af0| 88 ca 0e 0b 70 5c 22 88 | 0e 5c 66 84 35 00 cd 82 |....p\".|.\f.5...|
|00000b00| 4d 00 0e 5c 66 ce 3d 83 | 40 00 ce 82 4d 00 0e 5c |M..\f.=.|@...M..\|
|00000b10| 66 cf 3d 83 4c 00 0e 10 | 82 4d 00 d1 1e 10 d2 5c |f.=.L...|.M.....\|
|00000b20| 6e 21 88 d3 70 21 88 c3 | c4 d4 5c 6e 5c 22 21 2b |n!..p!..|..\n\"!+|
|00000b30| 87 22 20 5b 65 78 70 61 | 6e 64 2d 66 69 6c 65 2d |." [expa|nd-file-|
|00000b40| 6e 61 6d 65 20 73 61 76 | 65 2d 70 6c 61 63 65 2d |name sav|e-place-|
|00000b50| 66 69 6c 65 20 66 69 6c | 65 20 6d 65 73 73 61 67 |file fil|e messag|
|00000b60| 65 20 66 6f 72 6d 61 74 | 20 22 53 61 76 69 6e 67 |e format| "Saving|
|00000b70| 20 70 6c 61 63 65 73 20 | 74 6f 20 25 73 2e 2e 2e | places |to %s...|
|00000b80| 22 20 67 65 74 2d 62 75 | 66 66 65 72 2d 63 72 65 |" get-bu|ffer-cre|
|00000b90| 61 74 65 20 22 20 2a 53 | 61 76 65 64 20 50 6c 61 |ate " *S|aved Pla|
|00000ba0| 63 65 73 2a 22 20 66 69 | 6c 65 2d 72 65 61 64 61 |ces*" fi|le-reada|
|00000bb0| 62 6c 65 2d 70 20 69 6e | 73 65 72 74 2d 66 69 6c |ble-p in|sert-fil|
|00000bc0| 65 2d 63 6f 6e 74 65 6e | 74 73 20 70 72 69 6e 74 |e-conten|ts print|
|00000bd0| 20 73 61 76 65 2d 70 6c | 61 63 65 2d 61 6c 69 73 | save-pl|ace-alis|
|00000be0| 74 20 73 61 76 65 2d 70 | 6c 61 63 65 2d 76 65 72 |t save-p|lace-ver|
|00000bf0| 73 69 6f 6e 2d 63 6f 6e | 74 72 6f 6c 20 6e 69 6c |sion-con|trol nil|
|00000c00| 20 6e 65 76 65 72 20 6e | 6f 73 70 65 63 69 61 6c | never n|ospecial|
|00000c10| 20 76 65 72 73 69 6f 6e | 2d 63 6f 6e 74 72 6f 6c | version|-control|
|00000c20| 20 74 20 77 72 69 74 65 | 2d 66 69 6c 65 20 6b 69 | t write|-file ki|
|00000c30| 6c 6c 2d 62 75 66 66 65 | 72 20 22 53 61 76 69 6e |ll-buffe|r "Savin|
|00000c40| 67 20 70 6c 61 63 65 73 | 20 74 6f 20 25 73 2e 2e |g places| to %s..|
|00000c50| 2e 20 64 6f 6e 65 2e 22 | 5d 20 34 5d 20 6c 6f 61 |. done."|] 4] loa|
|00000c60| 64 2d 73 61 76 65 2d 70 | 6c 61 63 65 2d 61 6c 69 |d-save-p|lace-ali|
|00000c70| 73 74 2d 66 72 6f 6d 2d | 66 69 6c 65 20 23 5b 6e |st-from-|file #[n|
|00000c80| 69 6c 20 22 08 3f 85 3f | 00 c1 10 c2 0b 21 1c c5 |il ".?.?|.....!..|
|00000c90| 5c 66 21 83 3d 00 8a c6 | c7 c8 0b 5c 22 21 88 c9 |\f!.=...|...\"!..|
|00000ca0| ca 21 71 88 65 64 7c 88 | cb 5c 66 21 88 65 62 88 |.!q.ed|.|.\f!.eb.|
|00000cb0| cc 65 64 7b 21 40 16 0d | ce 70 21 88 c6 c7 cf 5c |.ed{!@..|.p!....\|
|00000cc0| 66 5c 22 21 88 29 29 d0 | 87 22 20 5b 73 61 76 65 |f\"!.)).|." [save|
|00000cd0| 2d 70 6c 61 63 65 2d 6c | 6f 61 64 65 64 20 74 20 |-place-l|oaded t |
|00000ce0| 65 78 70 61 6e 64 2d 66 | 69 6c 65 2d 6e 61 6d 65 |expand-f|ile-name|
|00000cf0| 20 73 61 76 65 2d 70 6c | 61 63 65 2d 66 69 6c 65 | save-pl|ace-file|
|00000d00| 20 66 69 6c 65 20 66 69 | 6c 65 2d 72 65 61 64 61 | file fi|le-reada|
|00000d10| 62 6c 65 2d 70 20 6d 65 | 73 73 61 67 65 20 66 6f |ble-p me|ssage fo|
|00000d20| 72 6d 61 74 20 22 4c 6f | 61 64 69 6e 67 20 70 6c |rmat "Lo|ading pl|
|00000d30| 61 63 65 73 20 66 72 6f | 6d 20 25 73 2e 2e 2e 22 |aces fro|m %s..."|
|00000d40| 20 67 65 74 2d 62 75 66 | 66 65 72 2d 63 72 65 61 | get-buf|fer-crea|
|00000d50| 74 65 20 22 20 2a 53 61 | 76 65 64 20 50 6c 61 63 |te " *Sa|ved Plac|
|00000d60| 65 73 2a 22 20 69 6e 73 | 65 72 74 2d 66 69 6c 65 |es*" ins|ert-file|
|00000d70| 2d 63 6f 6e 74 65 6e 74 | 73 20 72 65 61 64 2d 66 |-content|s read-f|
|00000d80| 72 6f 6d 2d 73 74 72 69 | 6e 67 20 73 61 76 65 2d |rom-stri|ng save-|
|00000d90| 70 6c 61 63 65 2d 61 6c | 69 73 74 20 6b 69 6c 6c |place-al|ist kill|
|00000da0| 2d 62 75 66 66 65 72 20 | 22 4c 6f 61 64 69 6e 67 |-buffer |"Loading|
|00000db0| 20 70 6c 61 63 65 73 20 | 66 72 6f 6d 20 25 73 2e | places |from %s.|
|00000dc0| 2e 2e 20 64 6f 6e 65 2e | 22 20 6e 69 6c 5d 20 34 |.. done.|" nil] 4|
|00000dd0| 5d 20 73 61 76 65 2d 70 | 6c 61 63 65 73 2d 74 6f |] save-p|laces-to|
|00000de0| 2d 61 6c 69 73 74 20 23 | 5b 6e 69 6c 20 22 c0 20 |-alist #|[nil ". |
|00000df0| 19 09 85 1a 00 8a 09 40 | 71 88 5c 6e 83 13 00 c3 |.......@|q.\n....|
|00000e00| 20 88 09 41 11 29 82 03 | 00 29 87 22 20 5b 62 75 | ..A.)..|.)." [bu|
|00000e10| 66 66 65 72 2d 6c 69 73 | 74 20 62 75 66 2d 6c 69 |ffer-lis|t buf-li|
|00000e20| 73 74 20 62 75 66 66 65 | 72 2d 66 69 6c 65 2d 6e |st buffe|r-file-n|
|00000e30| 61 6d 65 20 73 61 76 65 | 2d 70 6c 61 63 65 2d 74 |ame save|-place-t|
|00000e40| 6f 2d 61 6c 69 73 74 5d | 20 31 5d 20 73 61 76 65 |o-alist]| 1] save|
|00000e50| 2d 70 6c 61 63 65 2d 66 | 69 6e 64 2d 66 69 6c 65 |-place-f|ind-file|
|00000e60| 2d 68 6f 6f 6b 20 23 5b | 6e 69 6c 20 22 08 84 07 |-hook #[|nil "...|
|00000e70| 00 c1 20 88 c2 0b 5c 66 | 5c 22 89 1d 85 1d 00 0e |.. ...\f|\"......|
|00000e80| 06 84 19 00 0d 41 62 88 | c7 89 16 08 29 87 22 20 |.....Ab.|....)." |
|00000e90| 5b 73 61 76 65 2d 70 6c | 61 63 65 2d 6c 6f 61 64 |[save-pl|ace-load|
|00000ea0| 65 64 20 6c 6f 61 64 2d | 73 61 76 65 2d 70 6c 61 |ed load-|save-pla|
|00000eb0| 63 65 2d 61 6c 69 73 74 | 2d 66 72 6f 6d 2d 66 69 |ce-alist|-from-fi|
|00000ec0| 6c 65 20 61 73 73 6f 63 | 20 62 75 66 66 65 72 2d |le assoc| buffer-|
|00000ed0| 66 69 6c 65 2d 6e 61 6d | 65 20 73 61 76 65 2d 70 |file-nam|e save-p|
|00000ee0| 6c 61 63 65 2d 61 6c 69 | 73 74 20 63 65 6c 6c 20 |lace-ali|st cell |
|00000ef0| 61 66 74 65 72 2d 66 69 | 6e 64 2d 66 69 6c 65 2d |after-fi|nd-file-|
|00000f00| 66 72 6f 6d 2d 72 65 76 | 65 72 74 2d 62 75 66 66 |from-rev|ert-buff|
|00000f10| 65 72 20 74 20 73 61 76 | 65 2d 70 6c 61 63 65 5d |er t sav|e-place]|
|00000f20| 20 34 5d 20 73 61 76 65 | 2d 70 6c 61 63 65 2d 6b | 4] save|-place-k|
|00000f30| 69 6c 6c 2d 65 6d 61 63 | 73 2d 68 6f 6f 6b 20 23 |ill-emac|s-hook #|
|00000f40| 5b 6e 69 6c 20 22 c0 20 | 88 c1 20 87 22 20 5b 73 |[nil ". |.. ." [s|
|00000f50| 61 76 65 2d 70 6c 61 63 | 65 73 2d 74 6f 2d 61 6c |ave-plac|es-to-al|
|00000f60| 69 73 74 20 73 61 76 65 | 2d 70 6c 61 63 65 2d 61 |ist save|-place-a|
|00000f70| 6c 69 73 74 2d 74 6f 2d | 66 69 6c 65 5d 20 31 5d |list-to-|file] 1]|
|00000f80| 20 61 64 64 2d 68 6f 6f | 6b 20 66 69 6e 64 2d 66 | add-hoo|k find-f|
|00000f90| 69 6c 65 2d 68 6f 6f 6b | 73 20 74 20 6b 69 6c 6c |ile-hook|s t kill|
|00000fa0| 2d 65 6d 61 63 73 2d 68 | 6f 6f 6b 20 6b 69 6c 6c |-emacs-h|ook kill|
|00000fb0| 2d 62 75 66 66 65 72 2d | 68 6f 6f 6b 20 70 72 6f |-buffer-|hook pro|
|00000fc0| 76 69 64 65 20 73 61 76 | 65 70 6c 61 63 65 5d 20 |vide sav|eplace] |
|00000fd0| 34 29 0a | |4). | |
+--------+-------------------------+-------------------------+--------+--------+